home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 5 Developer's Kit / vb5 dev kit.iso / dev / par / start.bat < prev    next >
Encoding:
DOS Batch File  |  1996-05-12  |  1.2 KB  |  58 lines
  1.     @ECHO OFF
  2.     ECHO OFF
  3.  
  4.     IF (%1) == (@) GOTO %2
  5.  
  6.     SV S
  7.     IF EXIST SV.IVS SV R OK SV.IVS
  8.  
  9. :MAIN                             
  10.     MENU POM START 1
  11.     IF ERRORLEVEL 10 GOTO QUIT
  12.     IF ERRORLEVEL  5 GOTO DISPLAY
  13.     IF ERRORLEVEL  4 GOTO LICENSE
  14.     IF ERRORLEVEL  3 GOTO TUTORIAL
  15.     IF ERRORLEVEL  2 VIEW CHANGE.DOC MAIN
  16.     IF ERRORLEVEL  1 VIEW POM.DOC    MAIN
  17.  
  18. :LICENSE
  19.     MENU POM LICENSE 2
  20.     IF ERRORLEVEL 10 GOTO MAIN
  21.     IF ERRORLEVEL  7 GOTO VENDOR
  22.     IF ERRORLEVEL  2 VIEW ORDER.FRM   LICENSE
  23.     IF ERRORLEVEL  1 VIEW OPTIONS.DOC LICENSE
  24. :VENDOR
  25.     IF EXIST VENDINFO.DIZ GOTO OKDIZ
  26.     SHOWSBX POM MISSING
  27.     GOTO LICENSE
  28. :OKDIZ
  29.     SEE VENDINFO.DIZ
  30.     GOTO LICENSE
  31.  
  32. :TUTORIAL
  33.     MENU POM TUTORIAL 3
  34.     IF ERRORLEVEL 10 GOTO MAIN
  35.     IF ERRORLEVEL 4 TUTORIAL 04
  36.     IF ERRORLEVEL 3 TUTORIAL 03
  37.     IF ERRORLEVEL 2 TUTORIAL 02
  38.     IF ERRORLEVEL 1 VIEW TUTORIAL.DOC TUTORIAL
  39.  
  40. :DISPLAY
  41.     MENU POM DISPLAY 4
  42.     IF ERRORLEVEL 10 GOTO MAIN
  43.     IF ERRORLEVEL  3 GOTO DISPXGA
  44.     IF ERRORLEVEL  1 GOTO DISPSTD
  45.  
  46. :DISPSTD
  47.     SV K OK
  48.     GOTO DISPSAVE
  49. :DISPXGA
  50.     SV V OK
  51. :DISPSAVE
  52.     SV S OK SV.IVS
  53.     GOTO MAIN
  54.  
  55. :QUIT
  56.     SHOWSBX POM TY
  57.     SV R
  58.